home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / programm / GNU_C++ / LIB / SRC / GEMLIB38.LZH / _pc_asm.s < prev    next >
Encoding:
Text File  |  1998-06-19  |  354 b   |  25 lines

  1.             .TEXT
  2.             .EXPORT aes, vdi
  3.             .EXPORT vq_gdos, vq_vgdos
  4.  
  5. aes:        move.l    a0,d1        ; pb in A0 und nicht auf Stack!
  6.             move.w    #200,d0
  7.             trap    #2
  8.             rts
  9.  
  10. vdi:        move.l    a0,d1
  11.             move.w    #115,d0
  12.             trap    #2
  13.             rts
  14.  
  15. vq_gdos:    move.w    #-2,d0
  16.             trap    #2
  17.             cmp.w    #-2,d0
  18.             sne        d0
  19.             ext.w    d0
  20.             rts
  21.  
  22. vq_vgdos:    moveq    #-2,d0
  23.              trap    #2
  24.             rts
  25.